-- card: 27625 from stack: in
-- bmap block id: 4404
-- flags: 4000
-- background id: 27017
-- name: journal names
----- HyperTalk script -----
on closeCard
  -- something has been added to the list of journals. Remake the list.

  global journalList

  if return&return is not in field "Names" then
    put field "Names" & return & "Go to Journal Name Card" into journalList
  else
    -- Count the number of bad lines.
    put 0 into badlines
    repeat with linenr = 1 to number of lines of field "Names"
      if word 1 of line linenr of field "Names" is empty then
        put badlines+1 into badlines
        if badlines = 1 then beep
      end if
    end repeat

    if badlines = 1 then
      put "Among the journal names there's one line containing only spaces."
    else if badlines > 1 then
      put "Among the journal names there's " & badlines & " lines containing only spaces."
    end if

    flash
    complainSound

  end if

end closeCard


-- part 3 (button)
-- low flags: 00
-- high flags: 0002
-- rect: left=477 top=282 right=305 bottom=507
-- title width / last selected line: 0
-- icon id / first selected line: 6720 / 6720
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return Button
----- HyperTalk script -----
on mouseUp
  pop card
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: 2004
-- rect: left=400 top=3 right=37 bottom=440
-- title width / last selected line: 0
-- icon id / first selected line: 32462 / 32462
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Help
----- HyperTalk script -----
on mouseUp
  push card
  go to background "Help"
end mouseUp



-- part contents for background part 1
----- text -----
ACM Transactions on Computer Systems
Communications of the ACM
Computer
Computing Surveys
IEEE Transactions on Computers
IEEE Transactions on Software Engineering
Journal of the ACM